C------------------------------------- ENTHALPY TABLE OF H2O -----HOT
C     EXTRAPOLATED ABOVE 6000 K
C-----------------------------------------------------------------HOT
      DATA (HK(N,15),N=1,50)
     & /0.0000D+00, 7.8600D-01, 1.5830D+00, 2.3820D+00, 3.1920D+00,
     &  4.0210D+00, 4.8760D+00, 5.7570D+00, 6.6670D+00, 7.6070D+00,
     &  8.5760D+00, 9.5770D+00, 1.0607D+01, 1.1665D+01, 1.2751D+01,
     &  1.3862D+01, 1.4997D+01, 1.6154D+01, 1.7331D+01, 1.8527D+01,
     &  1.9740D+01, 2.0969D+01, 2.2213D+01, 2.3470D+01, 2.4739D+01,
     &  2.6020D+01, 2.7312D+01, 2.8613D+01, 2.9923D+01, 3.1242D+01,
     &  3.2568D+01, 3.3902D+01, 3.5243D+01, 3.6590D+01, 3.7944D+01,
     &  3.9303D+01, 4.0667D+01, 4.2036D+01, 4.3410D+01, 4.4789D+01,
     &  4.6172D+01, 4.7559D+01, 4.8950D+01, 5.0344D+01, 5.1742D+01,
     &  5.3144D+01, 5.4548D+01, 5.5956D+01, 5.7367D+01, 5.8780D+01/
      DATA (HK(N,15),N=51,100)
     & /6.0196D+01, 6.1702D+01, 6.3126D+01, 6.4552D+01, 6.5982D+01,
     &  6.7414D+01, 6.8849D+01, 7.0287D+01, 7.1727D+01, 7.3171D+01,
     &  7.4617D+01, 7.6063D+01, 7.7510D+01, 7.8956D+01, 8.0402D+01,
     &  8.1848D+01, 8.3295D+01, 8.4741D+01, 8.6187D+01, 8.7633D+01,
     &  8.9080D+01, 9.0526D+01, 9.1972D+01, 9.3418D+01, 9.4865D+01,
     &  9.6311D+01, 9.7757D+01, 9.9203D+01, 1.0065D+02, 1.0210D+02,
     &  1.0354D+02, 1.0499D+02, 1.0643D+02, 1.0788D+02, 1.0933D+02,
     &  1.1077D+02, 1.1222D+02, 1.1367D+02, 1.1511D+02, 1.1656D+02,
     &  1.1800D+02, 1.1945D+02, 1.2090D+02, 1.2234D+02, 1.2379D+02,
     &  1.2524D+02, 1.2668D+02, 1.2813D+02, 1.2957D+02, 1.3102D+02/
      DATA (HK(N,15),N=101,150)
     & /1.3247D+02, 1.3391D+02, 1.3536D+02, 1.3681D+02, 1.3825D+02,
     &  1.3970D+02, 1.4114D+02, 1.4259D+02, 1.4404D+02, 1.4548D+02,
     &  1.4693D+02, 1.4838D+02, 1.4982D+02, 1.5127D+02, 1.5271D+02,
     &  1.5416D+02, 1.5561D+02, 1.5705D+02, 1.5850D+02, 1.5995D+02,
     &  1.6139D+02, 1.6284D+02, 1.6428D+02, 1.6573D+02, 1.6718D+02,
     &  1.6862D+02, 1.7007D+02, 1.7152D+02, 1.7296D+02, 1.7441D+02,
     &  1.7585D+02, 1.7730D+02, 1.7875D+02, 1.8019D+02, 1.8164D+02,
     &  1.8308D+02, 1.8453D+02, 1.8598D+02, 1.8742D+02, 1.8887D+02,
     &  1.9032D+02, 1.9176D+02, 1.9321D+02, 1.9465D+02, 1.9610D+02,
     &  1.9755D+02, 1.9899D+02, 2.0044D+02, 2.0189D+02, 2.0333D+02/
      DATA (HK(N,15),N=151,201)
     & /2.0478D+02, 2.0622D+02, 2.0767D+02, 2.0912D+02, 2.1056D+02,
     &  2.1201D+02, 2.1346D+02, 2.1490D+02, 2.1635D+02, 2.1779D+02,
     &  2.1924D+02, 2.2069D+02, 2.2213D+02, 2.2358D+02, 2.2503D+02,
     &  2.2647D+02, 2.2792D+02, 2.2936D+02, 2.3081D+02, 2.3226D+02,
     &  2.3370D+02, 2.3515D+02, 2.3660D+02, 2.3804D+02, 2.3949D+02,
     &  2.4093D+02, 2.4238D+02, 2.4383D+02, 2.4527D+02, 2.4672D+02,
     &  2.4817D+02, 2.4961D+02, 2.5106D+02, 2.5250D+02, 2.5395D+02,
     &  2.5540D+02, 2.5684D+02, 2.5829D+02, 2.5974D+02, 2.6118D+02,
     &  2.6263D+02, 2.6407D+02, 2.6552D+02, 2.6697D+02, 2.6841D+02,
     &  2.6986D+02, 2.7131D+02, 2.7275D+02, 2.7420D+02, 2.7564D+02,
     &  2.7709D+02/
